Libris Britannia 4/science library(b).zip/science library(b)/PROGRAMM/DB_CLIPP/0264.ZIP/CHKBK.ARC/DEP.FMT

Text File | 1985-07-23 | 640b | 29 lines

@2,5 say lcorner+double+rcorner
@2,30 say "Balance: $"
@2,40 say balance picture "@B( #,###,###.##"
@3,5 say vedge
@3,75 say vedge
@4,5 say vedge
@4,75 say vedge
@5,5 say vedge
@5,75 say vedge
@6,5 say vedge
@6,75 say vedge
@7,5 say vedge
@7,75 say vedge
@8,5 say vedge
@8,75 say vedge
@9,5 say vedge
@9,75 say vedge
@10,5 say vedge
@10,75 say vedge
@11,5 say lowerl+double+lowerr
@5,27 say "Date of deposit:"
@5,43 get date
@7,7 say "Source of funds:"
@7,23 get source
@9,30 say "Amount: $"
@9,39 get amount picture "###,###.##"
@13,32 say "Cleared (Y/N)?"
@13,47 get cleared